home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 52 / 052.d81 / packer boot (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  1002 b   |  32 lines
  1. 1 ifx<>0then300
  2. 2 poke53281,1:poke53280,6
  3. 10 print"[147]"
  4. 20 print"        [176]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[174]"
  5. 30 print"        {$7d} Loadstar Presents {$7d}[144] "
  6. 40 print"        [173]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[189][144] "
  7. 50 print"                              "
  8. 60 print
  9. 70 print
  10. 80 print"    [154][176]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[174]"
  11. 90 print"    {$7d}     Picture Packer for      {$7d}[144] "
  12. 100 print"    [154]{$7d}  Koala and Doodle pictures  {$7d}[144] "
  13. 110 print"    [154]{$7d}                             {$7d}[144] "
  14. 120 print"    [154]{$7d}   Written by Alan Gardner   {$7d}[144][160]"
  15. 130 print"    [154]{$7d}                             {$7d}[144] "
  16. 140 print"    [154]{$7d}         (c) 1987            {$7d}[144][160]"
  17. 150 print"    [154][173]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[189][144] "
  18. 160 print"                                    "
  19. 170 print
  20. 180 print
  21. 190 print
  22. 200 print
  23. 210 print"    [176]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[174]"
  24. 220 print"    {$7d}  Please wait... now loading  {$7d}[144] "
  25. 230 print"    [173]{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}[189][144] "
  26. 240 print"                                     "
  27. 250 print"";
  28. 260 ifx=0thenx=1:load"bload.828",8,1
  29. 300 print"load"chr$(34)"packer"chr$(34)",8"
  30. 310 print"run:"
  31. 321 poke631,13:poke632,13:poke198,2:end
  32.